program Projeto;

uses
  Forms,
  uPrincipal in 'uPrincipal.pas' {fPrincipal},
  uListagemPadrao in 'uListagemPadrao.pas' {fListagemPadrao},
  uListagemCidade in 'uListagemCidade.pas' {fListCidade},
  uListagemCliente in 'uListagemCliente.pas' {fListClientes},
  uListVenda in 'uListVenda.pas' {fListVenda},
  uCadVenda in 'uCadVenda.pas' {fCadVenda},
  uDm in 'uDm.pas' {dm: TDataModule},
  uCadCidade in 'uCadCidade.pas' {fCadCidade},
  uCadPadrao in 'uCadPadrao.pas' {fCadastroPadrao},
  uCadCliente in 'uCadCliente.pas' {fCadCliente},
  uLancaProduto in 'uLancaProduto.pas' {fLancaProduto},
  uListagemProduto in 'uListagemProduto.pas' {fListProduto},
  uCadProduto in 'uCadProduto.pas' {fCadProduto},
  uListagemVendedor in 'uListagemVendedor.pas' {fListVendedor},
  uCadVendedor in 'uCadVendedor.pas' {fCadVendedor},
  uLogin in 'uLogin.pas' {fLogin},
  uListagemUsuario in 'uListagemUsuario.pas' {fListUsuario},
  uConfiguracoes in 'uConfiguracoes.pas' {fConfiguracoes},
  uCadCompra in 'uCadCompra.pas' {fCadCompra},
  uListagemCompra in 'uListagemCompra.pas' {fListCompra},
  uListagemFornecedor in 'uListagemFornecedor.pas' {fListFornecedor},
  uCadFornecedor in 'uCadFornecedor.pas' {fCadFornecedor},
  uFuncoes in 'uFuncoes.pas',
  uListagemCondicaoPagamento in 'uListagemCondicaoPagamento.pas' {fListCondicaoPagamento},
  uCadCondicaoPagamento in 'uCadCondicaoPagamento.pas' {fCadCondicaoPagamento},
  uCadUsuario in 'uCadUsuario.pas' {fCadUsuario},
  uLicenca in 'uLicenca.pas' {fLicenca},
  uListagemReceber in 'uListagemReceber.pas' {fListReceber},
  uCadFinanceiro in 'uCadFinanceiro.pas' {fCadFinanceiro},
  uCadParcela in 'uCadParcela.pas' {fCadParcela},
  uListagemPagar in 'uListagemPagar.pas' {fListPagar},
  uPesquisaPadrao in 'uPesquisaPadrao.pas' {fPesquisaPadrao},
  uPesquisaCidade in 'uPesquisaCidade.pas' {fPesquisaCidade},
  uPesquisaFornecedor in 'uPesquisaFornecedor.pas' {fPesquisaFornecedor},
  uPesquisaCondicaoPagamento in 'uPesquisaCondicaoPagamento.pas' {fPesquisaCondicaoPagamento},
  uPesquisaProduto in 'uPesquisaProduto.pas' {fPesquisaProduto},
  uPesquisaCliente in 'uPesquisaCliente.pas' {fPesquisaCliente},
  uPesquisaVendedor in 'uPesquisaVendedor.pas' {fPesquisaVendedor},
  uMovFinanceiro in 'uMovFinanceiro.pas' {fMovFinanceiro},
  uMovFinanceiroFinalizar in 'uMovFinanceiroFinalizar.pas' {fMovFinanceiroFinalizar},
  uCadCaixa in 'uCadCaixa.pas' {fCadCaixa},
  uListagemCaixa in 'uListagemCaixa.pas' {fListCaixa},
  uPesquisaCaixa in 'uPesquisaCaixa.pas' {fPesquisaCaixa},
  uCaixa in 'uCaixa.pas' {fCaixa},
  uCaixaFechamento in 'uCaixaFechamento.pas' {fCaixaFechamento},
  uRelatorios in 'uRelatorios.pas' {fRelatorios},
  uRelProduto in 'uRelProduto.pas' {fRelProduto},
  uCaixaLancamento in 'uCaixaLancamento.pas' {fCaixaLancamento},
  uCaixaTransferencia in 'uCaixaTransferencia.pas' {fCaixaTransferencia},
  uLiberacaoUsuario in 'uLiberacaoUsuario.pas' {fLiberacaoUsuario},
  uMovFinanceiroValorQuitar in 'uMovFinanceiroValorQuitar.pas' {fMovFinanceiroValorQuitar},
  uRelLucroRealProduto in 'uRelLucroRealProduto.pas' {fRelLucroRealProduto},
  uRelEstoqueProduto in 'uRelEstoqueProduto.pas' {fRelEstoqueProduto},
  uRelMovCaixa in 'uRelMovCaixa.pas' {fRelMovCaixa},
  uMovFinanceiroEntrada in 'uMovFinanceiroEntrada.pas' {fMovFinanceiroEntrada};

{$R *.res}
begin
  Application.CreateForm(Tdm, dm);
  if conectaBanco then
  begin
    if verificaLicenca then
    begin
      Application.Initialize;
      try
        Application.CreateForm(TfLogin, fLogin);
        fLogin.ShowModal;
      finally
        if fLogin.autenticado = true then
        begin
          Application.CreateForm(TfPrincipal, fPrincipal);
        end;
      end;
      Application.Run;
    end
    else
    begin
      Application.CreateForm(TfLicenca, fLicenca);
      fLicenca.ShowModal;
    end;
  end;
end.
